home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1988 November
/
Ahoy_Magazine_88-11_1988_Double_L.d64
/
FAST Mode
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
376b
|
11 lines
10 rem fast mode by steve cody
20 fast=828:slow=fast+14
30 for x=fast to fast+13:reada:pokex,a:ck=ck+a:next
40 ifck<>1707thenprint"data error!!":stop
50 data 173,17,208,41,239,141,17,208,169,1,141,48,208,96
60 forx=slow to slow+13:reada:pokex,a:ck=ck+a:next
70 ifck<>3158thenprint"data error!!":stop
80 data 169,0,141,48,208,173,17,208,9,16,141,17,208,96
90 print"sys"fast"for fast mode"
100 print"sys" slow"for slow mode":end